﻿Imports System.Data.SqlClient

Public Class Form1
    Public conexion As New SqlConnection("Data Source=.\SQLExpress; Initial Catalog = Relaciones;Integrated Security = true")
    Public adap_emple As New SqlDataAdapter("Select * from Tab_emple", conexion)
    Public adap_cargo As New SqlDataAdapter("Select * from Tab_cargos", conexion)
    Public midataset As New DataSet

    Public relacion As New SqlDataAdapter("Select Id_e, Nombre, Telefono, Cargo, Sueldo from Tab_emple, Tab_cargos where Cod_c=Cod_e", conexion)

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: esta línea de código carga datos en la tabla 'RelacionesDataSet.Tab_cargos' Puede moverla o quitarla según sea necesario.
        Me.Tab_cargosTableAdapter.Fill(Me.RelacionesDataSet.Tab_cargos)
        'TODO: esta línea de código carga datos en la tabla 'RelacionesDataSet.Tab_emple' Puede moverla o quitarla según sea necesario.
        Me.Tab_empleTableAdapter.Fill(Me.RelacionesDataSet.Tab_emple)
        'TODO: esta línea de código carga datos en la tabla 'RelacionesDataSet.Tab_emple' Puede moverla o quitarla según sea necesario.
        Me.Tab_empleTableAdapter.Fill(Me.RelacionesDataSet.Tab_emple)
        'TODO: esta línea de código carga datos en la tabla 'RelacionesDataSet.Tab_cargos' Puede moverla o quitarla según sea necesario.
        Me.Tab_cargosTableAdapter.Fill(Me.RelacionesDataSet.Tab_cargos)
        adap_emple.Fill(midataset, "Tab_emple")
        adap_cargo.Fill(midataset, "Tab_cargos")

        DataGridView1.DataSource = midataset
        DataGridView1.DataMember = "Tab_emple"

        DataGridView2.DataSource = midataset
        DataGridView2.DataMember = "Tab_cargos"

        relacion.Fill(midataset, "relacion")

        DataGridView3.DataSource = midataset
        DataGridView3.DataMember = "relacion"


    End Sub

    Private Sub Tab_empleBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Tab_empleBindingNavigatorSaveItem.Click
        Me.Validate()
        Me.Tab_empleBindingSource.EndEdit()
        Me.TableAdapterManager.UpdateAll(Me.RelacionesDataSet)

    End Sub
End Class
